home *** CD-ROM | disk | FTP | other *** search
/ Gekikoh Dennoh Club 2 / Gekikoh Dennoh Club Vol. 2 (Japan).7z / Gekikoh Dennoh Club Vol. 2 (Japan) (Track 01).bin / fsw / zm302 / zm302_s.lzh / ZCMACRO.S < prev    next >
Text File  |  1996-07-04  |  652b  |  37 lines
  1.     .nlist
  2.     .include    version.mac
  3.  
  4. Z_MUSIC    macro    number
  5.     moveq.l    number,d0
  6.     trap    #3
  7.     endm
  8.  
  9. m_err    macro    ec
  10.     move.l    #$8000_0000+ZM_COMPILER*65536+ec,d0
  11.     bra    m_error_code_exit
  12.     endm
  13.  
  14. m_warn    macro    wn
  15.     movem.l    d0-d7/a0-a5,-(sp)
  16.     move.l    #$8000_0000+ZM_COMPILER*65536+wn,d0
  17.     bra    m_warn_code_exit
  18.     endm
  19.  
  20. patch_w    macro    cmd,src,dest
  21.     .iff    (debug.and.2)
  22.     move.w    #cmd+((dest-src-2).and.$ff),src-work(a6)
  23.     .else
  24.     lea    dest-src-2(pc,d0.w),a0
  25.     dc.b    0,0    *for test
  26.     .endif
  27.     endm
  28.  
  29. patch_w2    macro    cmd,src,dest
  30.     .iff    (debug.and.2)
  31.     move.w    #cmd+((dest-src-2).and.$ff),src
  32.     .else
  33.     lea    dest-src-2(pc,d0.w),a0
  34.     dc.b    0,0    *for test
  35.     .endif
  36.     endm
  37.